home *** CD-ROM | disk | FTP | other *** search
- object FormProgress: TFormProgress
- Left = 391
- Top = 294
- Width = 440
- Height = 115
- HelpContext = 6000
- Caption = 'Progress...'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 432
- Height = 90
- Align = alClient
- Picture.Data = {<image000.bmp>}
- Stretch = True
- Transparent = True
- end
- object Label1: TLabel
- Left = 10
- Top = 21
- Width = 121
- Height = 13
- Caption = 'Over all progress......'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label2: TLabel
- Left = 10
- Top = 53
- Width = 113
- Height = 13
- Caption = 'File progress..........'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object ProgressAll: TMMGauge
- Left = 122
- Top = 21
- Width = 297
- Height = 12
- ForeColor = clLime
- BackColor = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clLime
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Bevel.BevelInner = bvNone
- Bevel.BevelOuter = bvLowered
- Bevel.BevelInnerWidth = 1
- Bevel.BevelOuterWidth = 1
- Bevel.BorderStyle = bsNone
- Bevel.BorderWidth = 0
- Bevel.BorderSpace = 0
- Bevel.BorderColor = clBtnFace
- Bevel.BorderSpaceColor = clBlack
- Bevel.InnerLightColor = clBtnHighlight
- Bevel.InnerShadowColor = clBtnShadow
- Bevel.OuterLightColor = clBtnHighlight
- Bevel.OuterShadowColor = clBtnShadow
- ParentFont = False
- end
- object ProgressFile: TMMGauge
- Left = 122
- Top = 53
- Width = 297
- Height = 12
- ForeColor = clLime
- BackColor = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clLime
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Bevel.BevelInner = bvNone
- Bevel.BevelOuter = bvLowered
- Bevel.BevelInnerWidth = 1
- Bevel.BevelOuterWidth = 1
- Bevel.BorderStyle = bsNone
- Bevel.BorderWidth = 0
- Bevel.BorderSpace = 0
- Bevel.BorderColor = clBtnFace
- Bevel.BorderSpaceColor = clBlack
- Bevel.InnerLightColor = clBtnHighlight
- Bevel.InnerShadowColor = clBtnShadow
- Bevel.OuterLightColor = clBtnHighlight
- Bevel.OuterShadowColor = clBtnShadow
- ParentFont = False
- end
- end
-